home *** CD-ROM | disk | FTP | other *** search
/ Aminet 33 / Aminet 33 - October 1999.iso / Aminet / hard / hack / hddmem_exp_a50.lha / hddmem_exp_a500 / Pld / HM010.PDS < prev    next >
Text File  |  1998-11-03  |  49KB  |  2,804 lines
  1.  
  2. TITLE           A500 Memory and HDD Controller
  3. PATTERN         1
  4. REVISION        1.6
  5. AUTHOR          Vladimir Sobolev
  6. COMPANY         Vladimir Sobolev corp.
  7. DATE            02/11/98
  8.  
  9. CHIP    Dream_Expander  nfx740_68
  10.  
  11. ; Inputs
  12.  
  13. pin 53  cdac       ; SYNCHRONOUS CLOCK 7Mhz
  14. pin 19  cpuclk
  15.  
  16.  
  17. pin 2   a18
  18. pin 3   a17
  19. pin 4   a16
  20.  
  21.  
  22. pin 43   ior
  23. pin 44   iow
  24. pin 7   cs1
  25. pin 8   cs0
  26. pin 9   irq
  27. pin 11  cas3
  28. pin 12  cas2
  29. pin 13  cas1
  30. pin 14  cas0
  31.  
  32.  
  33. pin 15  a15
  34. pin 16  a14
  35.  
  36.  
  37. pin 56  ovr    open_drain  ; 22  b0 m0
  38. pin 23  int2   open_drain
  39. pin 24  ras1
  40. pin 25  ras0
  41. ;pin 26  we
  42. pin 27  adr_sw
  43. pin 57  rom_oe   ; 57 b3 m1
  44. pin 29  reset
  45. pin 30  d14   open_drain
  46. pin 31  d15
  47.  
  48.  
  49.  
  50. pin 36  a23
  51. pin 37  a22
  52. pin 38  a21
  53.  
  54.  
  55. pin 40  a13
  56. pin 41  a12
  57. pin 42  a3
  58.  
  59.  
  60. pin 49  a20
  61. pin 50  a19
  62.  
  63.  
  64. pin 60 sys_rst
  65. pin 61 dtack  open_drain   ; 61 b3 m5
  66. pin 62 rd_wr
  67. pin 63 as
  68. pin 64 uds
  69. pin 65 lds ; 65
  70.  
  71.  
  72. pin  58 regclk
  73. pin  22 casreg             ; 59  b3 m3
  74.  
  75. node   rasreg    regfbk  ; 65 b3 m9
  76.  
  77. node   rascpu    regfbk  ; 56 b3 m0
  78. node  28 cascpu    regfbk  ; 28 b0 m6
  79.  
  80. node  6  da8000    regfbk  ; 6  b1 m8
  81. node  48 da9000_r  cmbfbk  ; 48 b2 m0
  82. node  29 da9000    regfbk  ; 29 b0 m7
  83. node  5  daa000    regfbk  ; 5  b1 m9
  84.  
  85. node  45 f8_wr_en  regfbk  ; 45 b2 m3
  86. node  42 f8_mem_en regfbk  ; 42 b2 m6
  87. node  41 c0_mem_en regfbk  ; 41 b2 m7
  88. node  47 hdd_dis   regfbk  ; 47 b2 m1
  89. node  40 mem_dis   regfbk  ; 40 b2 m8
  90. node  39 id_dis    regfbk  ; 39 b2 m9
  91. node  46 con_dis   regfbk  ; 46 b2 m2
  92.  
  93.  
  94. node  9  da9sel    cmbfbk  ; 9  b1 m5
  95. node  10 d15_oe    cmbfbk  ; 10 b1 m4
  96. node  26 b8sel     cmbfbk  ; 26 b0 m4
  97. node   d15p      cmbfbk  ; 63 b3 m7
  98.  
  99. node   idst2     regfbk  ; 64 b3 m8
  100. node   idst1     regfbk  ; 60 b3 m4
  101. node   idst0     regfbk  ; 58 b3 m2
  102.  
  103. node   rst_x     regfbk
  104.  
  105. ;node  ovl
  106.  
  107.  
  108. STATE
  109. MOORE_MACHINE
  110. DEFAULT_BRANCH st0
  111.  
  112. st0 = /idst2 * /idst1 * /idst0
  113. st1 = /idst2 * /idst1 * idst0
  114. st2 = /idst2 * idst1 * /idst0
  115. st3 = /idst2 * idst1 * idst0
  116. st4 = idst2 * /idst1 * /idst0
  117. st5 = idst2 * /idst1 * idst0
  118. st6 = idst2 * idst1 * /idst0
  119. st7 = idst2 * idst1 * idst0
  120.  
  121. ; state after reset
  122. st0 := a3 -> st0
  123.      + /a3 -> st1
  124.  
  125. ; state after first r/w $dexxxx with a3=0
  126. st1 := rd_wr -> st1
  127.      + /rd_wr -> st2
  128.  
  129. ; state after two write to $dexxxx               1
  130. st2 := rd_wr * /id_dis -> st3
  131.      + rd_wr * id_dis -> st6
  132.      + /rd_wr -> st2
  133.  
  134. ; state after first read $dexxxx with id_dis=0   1
  135. st3 := rd_wr -> st4
  136.      + /rd_wr -> st2
  137.  
  138. ; state after two read $dexxxx with id_dis=0     0
  139. st4 := rd_wr -> st5
  140.      + /rd_wr -> st2
  141.  
  142. ; state after three read $dexxxx with id_dis=0   1
  143. st5 := rd_wr -> st5
  144.      + /rd_wr -> st2
  145.  
  146. ; state after first read $dexxxx with id_dis=1
  147. st6 := rd_wr -> st7
  148.      + /rd_wr -> st2
  149.  
  150. ; state after two read $dexxxx with id_dis=1
  151. st7 := rd_wr -> st0
  152.      + /rd_wr -> st2
  153.  
  154.  
  155.  
  156.  
  157. EQUATIONS
  158.  
  159.  idst[0:2].aclk = /(/as * a23 *a22 * /a21 * a20 * a19 * a18 * a17 * /a16)
  160.  idst[0:2].rstf = /reset
  161.  idst[0:2].trst = gnd
  162.  
  163.  b8sel = /as * a23 * /a22 * a21 * a20 * a19 * /a18 * /a17 * /a16
  164.  b8sel.trst = gnd
  165.  
  166. ; open_drain pin
  167.  int2 = /da9000
  168.  
  169. ; ovl.d:= gnd
  170. ; ovl.clkf = cdac
  171. ; ovl.rstf = /reset
  172.  
  173.  rst_x := /reset              ; ____|~<reset~~~~~~~~~~~~~|_<fxxxxx_call____
  174.        + reset * rst_x * as
  175.        + reset * rst_x * /a23
  176.        + reset * rst_x * /a22
  177.        + reset * rst_x * /a21
  178.        + reset * rst_x * /a20
  179.  rst_x.clkf = cdac
  180.  rst_x.rstf = gnd
  181.  rst_x.setf = gnd
  182.  rst_x.trst = gnd
  183.  
  184.  rom_oe = /((/rst_x * /f8_mem_en * /as * rd_wr * a23 * a22 * a21 * a20 * a19)
  185.           + rst_x)
  186.  rom_oe.trst = vcc
  187.  
  188. ; open_drain pin
  189.  ovr = /(/as * /a23 * /a22 * a21                                ; 20-3f
  190.      + /as * /a23 * a22 * /a21                                  ; 40-5f
  191.      + /as * /a23 * a22 * a21                                   ; 60-7f
  192.      + /as * a23 * /a22 * /a21                                  ; 80-9f
  193.      + /as * a23 * a22 * /a21 * /a20                            ; c0-cf
  194.      + /as * a23 * a22 * /a21 * a20 * /a19                      ; d0-d7
  195.      + /as * a23 * /a22 * a21 * a20 * a19 * /a18 * /a17 * /a16  ; b8
  196.      + /as * a23 * a22 * /a21 * a20 * a19 * /a18 * a17 * /a16   ; da
  197.      + /as * a23 * a22 * /a21 * a20 * a19 * a18 * a17 * /a16    ; de
  198.      + /as * a23 * a22 * a21 * a20 * a19 * f8_mem_en)           ; f8-ff
  199.  
  200. ; open_drain pin
  201.  dtack = /(/as * /a23 * /a22 * a21                              ; 20-3f
  202.      + /as * /a23 * a22 * /a21                                  ; 40-5f
  203.      + /as * /a23 * a22 * a21                                   ; 60-7f
  204.      + /as * a23 * /a22 * /a21                                  ; 80-9f
  205.      + /as * a23 * a22 * /a21 * /a20                            ; c0-cf
  206.      + /as * a23 * a22 * /a21 * a20 * /a19                      ; d0-d7
  207.      + /as * a23 * /a22 * a21 * a20 * a19 * /a18 * /a17 * /a16  ; b8
  208.      + /as * a23 * a22 * /a21 * a20 * a19 * /a18 * a17 * /a16   ; da
  209.      + /as * a23 * a22 * /a21 * a20 * a19 * a18 * a17 * /a16    ; de
  210.      + /as * a23 * a22 * a21 * a20 * a19 * f8_mem_en)           ; f8-ff
  211.  
  212. ; this pin connect with external counter reset pin
  213.  casreg.d := regclk * as
  214.  casreg.clkf = /cdac
  215.  casreg.trst = vcc
  216.  
  217.  rasreg.d := casreg
  218.  rasreg.clkf = cdac
  219.  rasreg.trst = gnd
  220.  
  221.  rascpu.d := /mem_dis * /as * /a23 * /a22 * a21                        ; 20-3f
  222.        + /mem_dis * /as * /a23 * a22 * /a21                            ; 40-5f
  223.        + /mem_dis * /as * /a23 * a22 * a21                             ; 60-7f
  224.        + /mem_dis * /c0_mem_en * /as * a23 * /a22 * /a21 * /a20        ; 80-8f
  225.        + /mem_dis * /c0_mem_en * /as * a23 * /a22 * /a21 * a20 * /a19  ; 90-97
  226.        + /mem_dis * /f8_mem_en * /as * a23 * /a22 * /a21 * a20 * a19   ; 98-9f
  227.        + /mem_dis * c0_mem_en * /as * a23 * a22 * /a21 * /a20          ; c0-cf
  228.        + /mem_dis * c0_mem_en * /as * a23 * a22 * /a21 * a20 * /a19    ; d0-d7
  229.        + f8_mem_en * rd_wr * /as * a23 * a22 * a21 * a20 * a19              ; f8-ff
  230.        + f8_mem_en * /rd_wr * f8_wr_en * /as * a23 * a22 * a21 * a20 * a19  ; f8-ff
  231.  rascpu.clkf = /cdac
  232.  rascpu.rstf = as
  233.  rascpu.trst = gnd
  234.  
  235.  cascpu.d := rascpu
  236.  cascpu.clkf = /cdac
  237.  cascpu.rstf = as
  238.  cascpu.trst = gnd
  239.  
  240.  ras1 = /(rascpu * /a23 * a22 * a21                ; 60-7f
  241.         + rascpu * a23 * /a22 * /a21               ; 80-9f
  242.         + rascpu * a23 * a22 * /a21 * /a20         ; c0-cf
  243.         + rascpu * a23 * a22 * /a21 * a20 * /a19   ; d0-d7
  244.         + rascpu * a23 * a22 * a21 * a20 * a19     ; f8-ff
  245.         + rasreg)
  246.  ras1.trst = vcc
  247.  
  248.  ras0 = /(rascpu * /a23 * /a22 * a21               ; 20-3f
  249.         + rascpu * /a23 * a22 * /a21               ; 40-5f
  250.         + rasreg)
  251.  ras0.trst = vcc
  252.  
  253.  cas3 = /(cascpu * /uds * /a23 * a22 * /a21               ; 40-5f
  254.         + cascpu * /uds * a23 * /a22 * /a21               ; 80-9f
  255.         + cascpu * /uds * a23 * a22 * /a21 * /a20         ; c0-cf
  256.         + cascpu * /uds * a23 * a22 * /a21 * a20 * /a19   ; d0-d7
  257.         + cascpu * /uds * a23 * a22 * a21 * a20 * a19     ; f8-ff
  258.         + casreg)
  259.  cas3.trst = vcc
  260.  
  261.  cas2 = /(cascpu * /lds * /a23 * a22 * /a21               ; 40-5f
  262.         + cascpu * /lds * a23 * /a22 * /a21               ; 80-9f
  263.         + cascpu * /lds * a23 * a22 * /a21 * /a20         ; c0-cf
  264.         + cascpu * /lds * a23 * a22 * /a21 * a20 * /a19   ; d0-d7
  265.         + cascpu * /lds * a23 * a22 * a21 * a20 * a19     ; f8-ff
  266.         + casreg)
  267.  cas2.trst = vcc
  268.  
  269.  cas1 = /(cascpu * /uds * /a23 * /a22 * a21        ; 20-3f
  270.         + cascpu * /uds * /a23 * a22 * a21         ; 60-7f
  271.         + casreg)
  272.  cas1.trst = vcc
  273.  
  274.  cas0 = /(cascpu * /lds * /a23 * /a22 * a21        ; 20-3f
  275.         + cascpu * /lds * /a23 * a22 * a21         ; 60-7f
  276.         + casreg)
  277.  cas0.trst = vcc
  278.  
  279.  adr_sw.d := /rascpu
  280.  adr_sw.clkf = cdac
  281.  adr_sw.setf = as
  282.  adr_sw.trst = vcc
  283.  
  284. ; we = /(rascpu * /rd_wr)
  285. ; we.trst = vcc
  286.  
  287.  
  288.  cs1.d := /(/hdd_dis * /as * a23 * a22 * /a21 * a20 * a19 * /a18 * a17 * /a16
  289.           * /a15 * /a14 * a12)
  290.  cs1.clkf = cdac
  291.  cs1.trst = vcc
  292.  
  293.  cs0.d := /(/hdd_dis * /as * a23 * a22 * /a21 * a20 * a19 * /a18 * a17 * /a16
  294.           * /a15 * /a14 * /a12)
  295.  cs0.clkf = cdac
  296.  cs0.trst = vcc
  297.  
  298.  ior = /((rd_wr * /cs1 * /uds)
  299.         + (rd_wr * /cs1 * /lds)
  300.         + (rd_wr * /cs0 * /uds)
  301.         + (rd_wr * /cs0 * /lds))
  302.  ior.trst = vcc
  303.  
  304.  iow = /((/rd_wr * /cs1 * /uds)
  305.         + (/rd_wr * /cs1 * /lds)
  306.         + (/rd_wr * /cs0 * /uds)
  307.         + (/rd_wr * /cs0 * /lds))
  308.  iow.trst = vcc
  309.  
  310.  d15_oe = ((/hdd_dis * /as * rd_wr * a23 * a22 * /a21 * a20
  311.           * a19 * /a18 * a17 * /a16 * a15 * /a14 * /a13)         ; da8-da9
  312.           + (/hdd_dis * /as * rd_wr * a23 * a22 * /a21 * a20
  313.           * a19 * /a18 * a17 * /a16 * a15 * /a14 * a13 * /a12)   ; daa
  314.           + (/con_dis * /as * rd_wr * a23 * a22 * /a21 * a20
  315.           * a19 * a18 * a17 * /a16)                              ; de
  316.           + (/con_dis * /as * rd_wr * a23 * /a22 * a21 * a20
  317.           * a19 * /a18 * /a17 * /a16))                           ; b8
  318.  d15_oe.trst = gnd
  319.  
  320.  d15 = a18 * a17 * /idst2                                  ; de
  321.      + /a18 * a17 * /a13 * /a12 * /da8000 * irq            ; da
  322.      + /a18 * a17 * /a13 * /a12 * da8000                   ; da
  323.      + /a18 * a17 * /a13 * a12 * da9000                    ; da
  324.      + /a18 * a17 * a13 * /a12 * daa000                    ; da
  325.      + d15p
  326.  d15.trst = d15_oe
  327.  
  328.  d15p = a18 * a17 * idst2 * /idst1 * idst0                 ; de
  329.      + /a18 * /a17 * /idst2 * /idst1 * /idst0 * f8_wr_en   ; b8
  330.      + /a18 * /a17 * /idst2 * /idst1 * idst0 * con_dis     ; b8
  331.      + /a18 * /a17 * /idst2 * idst1 * /idst0 * id_dis      ; b8
  332.      + /a18 * /a17 * /idst2 * idst1 * idst0 * hdd_dis      ; b8
  333.      + /a18 * /a17 * idst2 * /idst1 * /idst0 * mem_dis     ; b8
  334.      + /a18 * /a17 * idst2 * idst1 * /idst0 * c0_mem_en    ; b8
  335.      + /a18 * /a17 * idst2 * idst1 * idst0 * f8_mem_en     ; b8
  336.  d15p.trst = gnd
  337.  
  338.  da9sel = /hdd_dis * /as * a23 * a22 * /a21 * a20
  339.      * a19 * /a18 * a17 * /a16
  340.      * a15 * /a14 * /a13 * a12                             ; da
  341.  da9sel.trst = gnd
  342.  
  343. ; open_drain pin
  344.  d14 = /(da9sel * rd_wr)
  345.  
  346.  da8000.d := /a13 * /a12 * d15.io
  347.            + /a13 * a12 * da8000
  348.            + a13 * da8000
  349.  da8000.aclk = /(/hdd_dis * /as * /rd_wr * a23 * a22 * /a21 * a20
  350.           * a19 * /a18 * a17 * /a16 * a15 * /a14)
  351.  da8000.trst = gnd
  352.  
  353.  da9000_r = (da9sel * /rd_wr * /uds * /d15.io) + /reset + hdd_dis
  354.  da9000_r.trst = gnd
  355.  
  356.  da9000.d := /da8000
  357.  da9000.aclk = irq
  358.  da9000.rstf = da9000_r
  359.  da9000.trst = gnd
  360.  
  361.  daa000.d := /a13 * daa000
  362.            + a13 * /a12 * d15.io
  363.            + a13 * a12 * daa000
  364.  daa000.aclk = /(/hdd_dis * /as * /rd_wr * a23 * a22 * /a21 * a20
  365.           * a19 * /a18 * a17 * /a16 * a15 * /a14)
  366.  daa000.trst = gnd
  367.  
  368.  
  369.  
  370. ; register f8_wr_en (st = 0)
  371.  f8_wr_en.d := /rd_wr * d14.io * /idst2 * /idst1 * /idst0 * /con_dis * d15.io
  372.              + rd_wr * f8_wr_en
  373.              + con_dis * f8_wr_en
  374.              + /d14.io * f8_wr_en
  375.              + idst2 * f8_wr_en
  376.              + idst1 * f8_wr_en
  377.              + idst0 * f8_wr_en
  378.  f8_wr_en.aclk = /b8sel
  379.  f8_wr_en.rstf = /sys_rst
  380.  f8_wr_en.trst = gnd
  381.  
  382.  
  383. ; register f8_mem_en (st = 7)
  384.  f8_mem_en.d := /rd_wr * d14.io * idst2 * idst1 * idst0 * /con_dis * d15.io
  385.               + rd_wr * f8_mem_en
  386.               + con_dis * f8_mem_en
  387.               + /d14.io * f8_mem_en
  388.               + /idst2 * f8_mem_en
  389.               + /idst1 * f8_mem_en
  390.               + /idst0 * f8_mem_en
  391.  f8_mem_en.aclk = /b8sel
  392.  f8_mem_en.rstf = /sys_rst
  393.  f8_mem_en.trst = gnd
  394.  
  395.  
  396. ; register c0_mem_en (st = 6)
  397.  c0_mem_en.d := /rd_wr * d14.io * idst2 * idst1 * /idst0 * /con_dis * d15.io
  398.               + rd_wr * c0_mem_en
  399.               + con_dis * c0_mem_en
  400.               + /d14.io * c0_mem_en
  401.               + /idst2 * c0_mem_en
  402.               + /idst1 * c0_mem_en
  403.               + idst0 * c0_mem_en
  404.  c0_mem_en.aclk = /b8sel
  405.  c0_mem_en.rstf = /sys_rst
  406.  c0_mem_en.trst = gnd
  407.  
  408.  
  409. ; register hdd_dis (st = 3)
  410.  hdd_dis.d := /rd_wr * d14.io * /idst2 * idst1 * idst0 * /con_dis * d15.io
  411.               + rd_wr * hdd_dis
  412.               + con_dis * hdd_dis
  413.               + /d14.io * hdd_dis
  414.               + idst2 * hdd_dis
  415.               + /idst1 * hdd_dis
  416.               + /idst0 * hdd_dis
  417.  hdd_dis.aclk = /b8sel
  418.  hdd_dis.rstf = /sys_rst
  419.  hdd_dis.trst = gnd
  420.  
  421.  
  422. ; register mem_dis (st = 4)
  423.  mem_dis.d := /rd_wr * d14.io * idst2 * /idst1 * /idst0 * /con_dis * d15.io
  424.               + rd_wr * mem_dis
  425.               + con_dis * mem_dis
  426.               + /d14.io * mem_dis
  427.               + /idst2 * mem_dis
  428.               + idst1 * mem_dis
  429.               + idst0 * mem_dis
  430.  mem_dis.aclk = /b8sel
  431.  mem_dis.rstf = /sys_rst
  432.  mem_dis.trst = gnd
  433.  
  434.  
  435. ;  register id_dis (st = 2)
  436.  id_dis.d := /rd_wr * d14.io * /idst2 * idst1 * /idst0 * /con_dis * d15.io
  437.               + rd_wr * id_dis
  438.               + con_dis * id_dis
  439.               + /d14.io * id_dis
  440.               + idst2 * id_dis
  441.               + /idst1 * id_dis
  442.               + idst0 * id_dis
  443.  id_dis.aclk = /b8sel
  444.  id_dis.rstf = /sys_rst
  445.  id_dis.trst = gnd
  446.  
  447.  
  448. ; register con_dis (st = 1)
  449.  con_dis.d := /rd_wr * d14.io * /idst2 * /idst1 * idst0 * /con_dis * d15.io
  450.               + rd_wr * con_dis
  451.               + con_dis * con_dis
  452.               + /d14.io * con_dis
  453.               + idst2 * con_dis
  454.               + idst1 * con_dis
  455.               + /idst0 * con_dis
  456.  con_dis.aclk = /b8sel
  457.  con_dis.rstf = /sys_rst
  458.  con_dis.trst = gnd
  459.  
  460.  
  461.  
  462.  
  463. SIMULATION
  464.  
  465. ; *********************************************************************
  466.  
  467.  trace_on
  468.  sys_rst reset cpuclk cdac as uds lds rd_wr rst_x
  469.  idst2 idst1 idst0 b8sel d15p d15.fb d15.io d15_oe d14.fb d14.io
  470.  regclk casreg rasreg rascpu adr_sw cascpu
  471.  ras1 ras0 cas3 cas2 cas1 cas0
  472.  f8_wr_en con_dis id_dis hdd_dis mem_dis c0_mem_en f8_mem_en
  473.  ovr dtack rom_oe
  474.  ior iow cs0 cs1 irq int2 da9sel
  475.  da8000 da9000_r da9000 daa000
  476.  a23 a22 a21 a20 a19 a18 a17 a16
  477.  a15 a14 a13 a12 a3
  478.  
  479.  setf as uds lds rd_wr reset sys_rst
  480.       /a23 /a22 /a21 /a20 /a19 /a18 /a17 /a16
  481.       /a15 /a14 /a13 /a12 /a3
  482.       /d14.io /d15.io /regclk /irq int2
  483.  
  484.  prldf idst[0:2] /da8000 /da9000 daa000 /casreg /rasreg /rascpu /cascpu
  485.        /f8_wr_en /con_dis /id_dis /hdd_dis /mem_dis /c0_mem_en /f8_mem_en
  486.        /rst_x
  487.  
  488.  
  489.  setf /sys_rst /reset           ; activate reset
  490.  setf cpuclk
  491.  setf cdac
  492.  setf /cpuclk
  493.  setf /cdac
  494.  setf sys_rst reset
  495.  
  496.  
  497. ; b8 write  d14.io=1  d15.io=1
  498.  setf cpuclk    ; 0 cycle
  499.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  500.  setf cdac
  501.  
  502.  setf /cpuclk   ; 1 cycle
  503.  setf /cdac
  504.  
  505.  setf cpuclk    ; 2 cycle
  506.  setf /as
  507.  setf cdac
  508.  
  509.  setf /cpuclk   ; 3 cycle
  510.  setf d14.io d15.io
  511.  setf /cdac
  512.  
  513.  setf cpuclk    ; 4 cycle
  514.  setf /uds /lds
  515.  setf cdac
  516.  
  517.  setf /cpuclk   ; 5 cycle
  518.  setf /cdac
  519.  
  520.  setf cpuclk    ; 6 cycle
  521.  setf cdac
  522.  
  523.  setf /cpuclk   ; 7 cycle
  524.  setf as uds lds
  525.  setf /cdac
  526.  
  527. ; result: set f8_wr_en to 1
  528.  
  529.  
  530. ; b8 write  d14.io=1  d15.io=0
  531.  setf cpuclk    ; 0 cycle
  532.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  533.  setf cdac
  534.  
  535.  setf /cpuclk   ; 1 cycle
  536.  setf /cdac
  537.  
  538.  setf cpuclk    ; 2 cycle
  539.  setf /as
  540.  setf cdac
  541.  
  542.  setf /cpuclk   ; 3 cycle
  543.  setf d14.io /d15.io
  544.  setf /cdac
  545.  
  546.  setf cpuclk    ; 4 cycle
  547.  setf /uds /lds
  548.  setf cdac
  549.  
  550.  setf /cpuclk   ; 5 cycle
  551.  setf /cdac
  552.  
  553.  setf cpuclk    ; 6 cycle
  554.  setf cdac
  555.  
  556.  setf /cpuclk   ; 7 cycle
  557.  setf as uds lds
  558.  setf /cdac
  559.  
  560. ; result: set f8_wr_en to 0
  561.  
  562.  
  563. ; de read  a3=1
  564.  setf cpuclk    ; 0 cycle
  565.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  566.  setf cdac
  567.  
  568.  setf /cpuclk   ; 1 cycle
  569.  setf /cdac
  570.  
  571.  setf cpuclk    ; 2 cycle
  572.  setf /as /uds /lds
  573.  setf cdac
  574.  
  575.  setf /cpuclk   ; 3 cycle
  576. ; setf d14.io d15.io
  577.  setf /cdac
  578.  
  579.  setf cpuclk    ; 4 cycle
  580.  setf /uds /lds
  581.  setf cdac
  582.  
  583.  setf /cpuclk   ; 5 cycle
  584.  setf /cdac
  585.  
  586.  setf cpuclk    ; 6 cycle
  587.  setf cdac
  588.  
  589.  setf /cpuclk   ; 7 cycle
  590.  setf as uds lds
  591.  setf /cdac
  592.  
  593. ; no result (a3=1)
  594.  
  595.  
  596. ; f8 read
  597.  setf cpuclk    ; 0 cycle
  598.  setf rd_wr a23 a22 a21 a20 a19 /a18 /a17 /a16
  599.  setf cdac
  600.  
  601.  setf /cpuclk   ; 1 cycle
  602.  setf /cdac
  603.  
  604.  setf cpuclk    ; 2 cycle
  605.  setf /as /uds /lds
  606.  setf cdac
  607.  
  608.  setf /cpuclk   ; 3 cycle
  609.  setf /cdac
  610.  
  611.  setf cpuclk    ; 4 cycle
  612.  setf /uds /lds
  613.  setf cdac
  614.  
  615.  setf /cpuclk   ; 5 cycle
  616.  setf /cdac
  617.  
  618.  setf cpuclk    ; 6 cycle
  619.  setf cdac
  620.  
  621.  setf /cpuclk   ; 7 cycle
  622.  setf as uds lds
  623.  setf /cdac
  624.  
  625.  
  626. ; de write  a3=1
  627.  setf cpuclk    ; 0 cycle
  628.  setf /rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  629.  setf cdac
  630.  
  631.  setf /cpuclk   ; 1 cycle
  632.  setf /cdac
  633.  
  634.  setf cpuclk    ; 2 cycle
  635.  setf /as ;/uds /lds
  636.  setf cdac
  637.  
  638.  setf /cpuclk   ; 3 cycle
  639.  setf d14.io d15.io
  640.  setf /cdac
  641.  
  642.  setf cpuclk    ; 4 cycle
  643.  setf /uds /lds
  644.  setf cdac
  645.  
  646.  setf /cpuclk   ; 5 cycle
  647.  setf /cdac
  648.  
  649.  setf cpuclk    ; 6 cycle
  650.  setf cdac
  651.  
  652.  setf /cpuclk   ; 7 cycle
  653.  setf as uds lds
  654.  setf /cdac
  655.  
  656. ; no result (a3=1)
  657.  
  658.  
  659. ; de write  a3=0
  660.  setf cpuclk    ; 0 cycle
  661.  setf /rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 /a3
  662.  setf cdac
  663.  
  664.  setf /cpuclk   ; 1 cycle
  665.  setf /cdac
  666.  
  667.  setf cpuclk    ; 2 cycle
  668.  setf /as ;/uds /lds
  669.  setf cdac
  670.  
  671.  setf /cpuclk   ; 3 cycle
  672.  setf d14.io d15.io
  673.  setf /cdac
  674.  
  675.  setf cpuclk    ; 4 cycle
  676.  setf /uds /lds
  677.  setf cdac
  678.  
  679.  setf /cpuclk   ; 5 cycle
  680.  setf /cdac
  681.  
  682.  setf cpuclk    ; 6 cycle
  683.  setf cdac
  684.  
  685.  setf /cpuclk   ; 7 cycle
  686.  setf as uds lds
  687.  setf /cdac
  688.  
  689. ; result: jump to idst "001" state
  690.  
  691.  
  692.  
  693.  
  694.  
  695. ; b8 write  d14.io=1  d15.io=0
  696.  setf cpuclk    ; 0 cycle
  697.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  698.  setf cdac
  699.  
  700.  setf /cpuclk   ; 1 cycle
  701.  setf /cdac
  702.  
  703.  setf cpuclk    ; 2 cycle
  704.  setf /as ; /uds /lds
  705.  setf cdac
  706.  
  707.  setf /cpuclk   ; 3 cycle
  708.  setf d14.io /d15.io
  709.  setf /cdac
  710.  
  711.  setf cpuclk    ; 4 cycle
  712.  setf /uds /lds
  713.  setf cdac
  714.  
  715.  setf /cpuclk   ; 5 cycle
  716.  setf /cdac
  717.  
  718.  setf cpuclk    ; 6 cycle
  719.  setf cdac
  720.  
  721.  setf /cpuclk   ; 7 cycle
  722.  setf as uds lds
  723.  setf /cdac
  724.  
  725. ; result: set con_dis to 0
  726.  
  727.  
  728.  
  729.  
  730.  
  731. ; de read  a3=1
  732.  setf cpuclk    ; 0 cycle
  733.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  734.  setf cdac
  735.  
  736.  setf /cpuclk   ; 1 cycle
  737.  setf /cdac
  738.  
  739.  setf cpuclk    ; 2 cycle
  740.  setf /as /uds /lds
  741.  setf cdac
  742.  
  743.  setf /cpuclk   ; 3 cycle
  744. ; setf d14.io d15.io
  745.  setf /cdac
  746.  
  747.  setf cpuclk    ; 4 cycle
  748.  setf /uds /lds
  749.  setf cdac
  750.  
  751.  setf /cpuclk   ; 5 cycle
  752.  setf /cdac
  753.  
  754.  setf cpuclk    ; 6 cycle
  755.  setf cdac
  756.  
  757.  setf /cpuclk   ; 7 cycle
  758.  setf as uds lds
  759.  setf /cdac
  760.  
  761. ; no result (read)
  762.  
  763.  
  764. ; de write  a3=1
  765.  setf cpuclk    ; 0 cycle
  766.  setf /rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  767.  setf cdac
  768.  
  769.  setf /cpuclk   ; 1 cycle
  770.  setf /cdac
  771.  
  772.  setf cpuclk    ; 2 cycle
  773.  setf /as ;/uds /lds
  774.  setf cdac
  775.  
  776.  setf /cpuclk   ; 3 cycle
  777.  setf d14.io d15.io
  778.  setf /cdac
  779.  
  780.  setf cpuclk    ; 4 cycle
  781.  setf /uds /lds
  782.  setf cdac
  783.  
  784.  setf /cpuclk   ; 5 cycle
  785.  setf /cdac
  786.  
  787.  setf cpuclk    ; 6 cycle
  788.  setf cdac
  789.  
  790.  setf /cpuclk   ; 7 cycle
  791.  setf as uds lds
  792.  setf /cdac
  793.  
  794. ; result: jump to idst "010" state
  795.  
  796.  
  797.  
  798.  
  799.  
  800.  
  801. ; b8 write  d14.io=1  d15.io=1
  802.  setf cpuclk    ; 0 cycle
  803.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  804.  setf cdac
  805.  
  806.  setf /cpuclk   ; 1 cycle
  807.  setf /cdac
  808.  
  809.  setf cpuclk    ; 2 cycle
  810.  setf /as ; /uds /lds
  811.  setf cdac
  812.  
  813.  setf /cpuclk   ; 3 cycle
  814.  setf d14.io d15.io
  815.  setf /cdac
  816.  
  817.  setf cpuclk    ; 4 cycle
  818.  setf /uds /lds
  819.  setf cdac
  820.  
  821.  setf /cpuclk   ; 5 cycle
  822.  setf /cdac
  823.  
  824.  setf cpuclk    ; 6 cycle
  825.  setf cdac
  826.  
  827.  setf /cpuclk   ; 7 cycle
  828.  setf as uds lds
  829.  setf /cdac
  830.  
  831. ; result: set id_dis to 1
  832.  
  833.  
  834. ; read id_dis
  835. ; b8 read
  836.  setf cpuclk    ; 0 cycle
  837.  setf rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  838.  setf cdac
  839.  
  840.  setf /cpuclk   ; 1 cycle
  841.  setf /cdac
  842.  
  843.  setf cpuclk    ; 2 cycle
  844.  setf /as /uds /lds
  845.  setf cdac
  846.  
  847.  setf /cpuclk   ; 3 cycle
  848. ; setf d14.io d15.io
  849.  setf /cdac
  850.  
  851.  setf cpuclk    ; 4 cycle
  852.  setf /uds /lds
  853.  setf cdac
  854.  
  855.  setf /cpuclk   ; 5 cycle
  856.  setf /cdac
  857.  
  858.  setf cpuclk    ; 6 cycle
  859.  setf cdac
  860.  
  861.  setf /cpuclk   ; 7 cycle
  862.  setf as uds lds
  863.  setf /cdac
  864.  
  865.  
  866. ; b8 write  d14.io=1  d15.io=0
  867.  setf cpuclk    ; 0 cycle
  868.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  869.  setf cdac
  870.  
  871.  setf /cpuclk   ; 1 cycle
  872.  setf /cdac
  873.  
  874.  setf cpuclk    ; 2 cycle
  875.  setf /as ; /uds /lds
  876.  setf cdac
  877.  
  878.  setf /cpuclk   ; 3 cycle
  879.  setf d14.io /d15.io
  880.  setf /cdac
  881.  
  882.  setf cpuclk    ; 4 cycle
  883.  setf /uds /lds
  884.  setf cdac
  885.  
  886.  setf /cpuclk   ; 5 cycle
  887.  setf /cdac
  888.  
  889.  setf cpuclk    ; 6 cycle
  890.  setf cdac
  891.  
  892.  setf /cpuclk   ; 7 cycle
  893.  setf as uds lds
  894.  setf /cdac
  895.  
  896. ; result: set id_dis to 0
  897.  
  898.  
  899. ; read id_dis
  900. ; b8 read
  901.  setf cpuclk    ; 0 cycle
  902.  setf rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  903.  setf cdac
  904.  
  905.  setf /cpuclk   ; 1 cycle
  906.  setf /cdac
  907.  
  908.  setf cpuclk    ; 2 cycle
  909.  setf /as /uds /lds
  910.  setf cdac
  911.  
  912.  setf /cpuclk   ; 3 cycle
  913. ; setf d14.io d15.io
  914.  setf /cdac
  915.  
  916.  setf cpuclk    ; 4 cycle
  917.  setf /uds /lds
  918.  setf cdac
  919.  
  920.  setf /cpuclk   ; 5 cycle
  921.  setf /cdac
  922.  
  923.  setf cpuclk    ; 6 cycle
  924.  setf cdac
  925.  
  926.  setf /cpuclk   ; 7 cycle
  927.  setf as uds lds
  928.  setf /cdac
  929.  
  930. ; de read  a3=1
  931.  setf cpuclk    ; 0 cycle
  932.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  933.  setf cdac
  934.  
  935.  setf /cpuclk   ; 1 cycle
  936.  setf /cdac
  937.  
  938.  setf cpuclk    ; 2 cycle
  939.  setf /as /uds /lds
  940.  setf cdac
  941.  
  942.  setf /cpuclk   ; 3 cycle
  943.  setf d14.io d15.io
  944.  setf /cdac
  945.  
  946.  setf cpuclk    ; 4 cycle
  947.  setf /uds /lds
  948.  setf cdac
  949.  
  950.  setf /cpuclk   ; 5 cycle
  951.  setf /cdac
  952.  
  953.  setf cpuclk    ; 6 cycle
  954.  setf cdac
  955.  
  956.  setf /cpuclk   ; 7 cycle
  957.  setf as uds lds
  958.  setf /cdac
  959.  
  960. ; result: jump to idst "011" state
  961.  
  962.  
  963.  
  964.  
  965.  
  966. ; b8 write  d14.io=1  d15.io=0
  967.  setf cpuclk    ; 0 cycle
  968.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  969.  setf cdac
  970.  
  971.  setf /cpuclk   ; 1 cycle
  972.  setf /cdac
  973.  
  974.  setf cpuclk    ; 2 cycle
  975.  setf /as ; /uds /lds
  976.  setf cdac
  977.  
  978.  setf /cpuclk   ; 3 cycle
  979.  setf d14.io /d15.io
  980.  setf /cdac
  981.  
  982.  setf cpuclk    ; 4 cycle
  983.  setf /uds /lds
  984.  setf cdac
  985.  
  986.  setf /cpuclk   ; 5 cycle
  987.  setf /cdac
  988.  
  989.  setf cpuclk    ; 6 cycle
  990.  setf cdac
  991.  
  992.  setf /cpuclk   ; 7 cycle
  993.  setf as uds lds
  994.  setf /cdac
  995.  
  996. ; result: set hdd_dis to 0
  997.  
  998.  
  999.  
  1000.  
  1001.  
  1002. ; de read  a3=1
  1003.  setf cpuclk    ; 0 cycle
  1004.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1005.  setf cdac
  1006.  
  1007.  setf /cpuclk   ; 1 cycle
  1008.  setf /cdac
  1009.  
  1010.  setf cpuclk    ; 2 cycle
  1011.  setf /as /uds /lds
  1012.  setf cdac
  1013.  
  1014.  setf /cpuclk   ; 3 cycle
  1015. ; setf d14.io d15.io
  1016.  setf /cdac
  1017.  
  1018.  setf cpuclk    ; 4 cycle
  1019.  setf /uds /lds
  1020.  setf cdac
  1021.  
  1022.  setf /cpuclk   ; 5 cycle
  1023.  setf /cdac
  1024.  
  1025.  setf cpuclk    ; 6 cycle
  1026.  setf cdac
  1027.  
  1028.  setf /cpuclk   ; 7 cycle
  1029.  setf as uds lds
  1030.  setf /cdac
  1031.  
  1032. ; result: jump to idst "100" state
  1033.  
  1034.  
  1035.  
  1036.  
  1037. ; b8 write  d14.io=1  d15.io=0
  1038.  setf cpuclk    ; 0 cycle
  1039.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  1040.  setf cdac
  1041.  
  1042.  setf /cpuclk   ; 1 cycle
  1043.  setf /cdac
  1044.  
  1045.  setf cpuclk    ; 2 cycle
  1046.  setf /as ; /uds /lds
  1047.  setf cdac
  1048.  
  1049.  setf /cpuclk   ; 3 cycle
  1050.  setf d14.io /d15.io
  1051.  setf /cdac
  1052.  
  1053.  setf cpuclk    ; 4 cycle
  1054.  setf /uds /lds
  1055.  setf cdac
  1056.  
  1057.  setf /cpuclk   ; 5 cycle
  1058.  setf /cdac
  1059.  
  1060.  setf cpuclk    ; 6 cycle
  1061.  setf cdac
  1062.  
  1063.  setf /cpuclk   ; 7 cycle
  1064.  setf as uds lds
  1065.  setf /cdac
  1066.  
  1067. ; result: set mem_dis to 0
  1068.  
  1069.  
  1070.  
  1071.  
  1072.  
  1073.  
  1074. ; de read  a3=1
  1075.  setf cpuclk    ; 0 cycle
  1076.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1077.  setf cdac
  1078.  
  1079.  setf /cpuclk   ; 1 cycle
  1080.  setf /cdac
  1081.  
  1082.  setf cpuclk    ; 2 cycle
  1083.  setf /as /uds /lds
  1084.  setf cdac
  1085.  
  1086.  setf /cpuclk   ; 3 cycle
  1087. ; setf d14.io d15.io
  1088.  setf /cdac
  1089.  
  1090.  setf cpuclk    ; 4 cycle
  1091.  setf /uds /lds
  1092.  setf cdac
  1093.  
  1094.  setf /cpuclk   ; 5 cycle
  1095.  setf /cdac
  1096.  
  1097.  setf cpuclk    ; 6 cycle
  1098.  setf cdac
  1099.  
  1100.  setf /cpuclk   ; 7 cycle
  1101.  setf as uds lds
  1102.  setf /cdac
  1103.  
  1104. ; result: jump to idst "101" state
  1105.  
  1106.  
  1107.  
  1108.  
  1109.  
  1110. ; de read  a3=1
  1111.  setf cpuclk    ; 0 cycle
  1112.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1113.  setf cdac
  1114.  
  1115.  setf /cpuclk   ; 1 cycle
  1116.  setf /cdac
  1117.  
  1118.  setf cpuclk    ; 2 cycle
  1119.  setf /as /uds /lds
  1120.  setf cdac
  1121.  
  1122.  setf /cpuclk   ; 3 cycle
  1123. ; setf d14.io d15.io
  1124.  setf /cdac
  1125.  
  1126.  setf cpuclk    ; 4 cycle
  1127.  setf /uds /lds
  1128.  setf cdac
  1129.  
  1130.  setf /cpuclk   ; 5 cycle
  1131.  setf /cdac
  1132.  
  1133.  setf cpuclk    ; 6 cycle
  1134.  setf cdac
  1135.  
  1136.  setf /cpuclk   ; 7 cycle
  1137.  setf as uds lds
  1138.  setf /cdac
  1139.  
  1140. ; no result (read)
  1141.  
  1142. ; de write  a3=1
  1143.  setf cpuclk    ; 0 cycle
  1144.  setf /rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1145.  setf cdac
  1146.  
  1147.  setf /cpuclk   ; 1 cycle
  1148.  setf /cdac
  1149.  
  1150.  setf cpuclk    ; 2 cycle
  1151.  setf /as ;/uds /lds
  1152.  setf cdac
  1153.  
  1154.  setf /cpuclk   ; 3 cycle
  1155.  setf d14.io d15.io
  1156.  setf /cdac
  1157.  
  1158.  setf cpuclk    ; 4 cycle
  1159.  setf /uds /lds
  1160.  setf cdac
  1161.  
  1162.  setf /cpuclk   ; 5 cycle
  1163.  setf /cdac
  1164.  
  1165.  setf cpuclk    ; 6 cycle
  1166.  setf cdac
  1167.  
  1168.  setf /cpuclk   ; 7 cycle
  1169.  setf as uds lds
  1170.  setf /cdac
  1171.  
  1172. ; result: jump to idst "010" state
  1173.  
  1174.  
  1175.  
  1176.  
  1177.  
  1178. ; b8 write  d14.io=1  d15.io=1
  1179.  setf cpuclk    ; 0 cycle
  1180.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  1181.  setf cdac
  1182.  
  1183.  setf /cpuclk   ; 1 cycle
  1184.  setf /cdac
  1185.  
  1186.  setf cpuclk    ; 2 cycle
  1187.  setf /as ; /uds /lds
  1188.  setf cdac
  1189.  
  1190.  setf /cpuclk   ; 3 cycle
  1191.  setf d14.io d15.io
  1192.  setf /cdac
  1193.  
  1194.  setf cpuclk    ; 4 cycle
  1195.  setf /uds /lds
  1196.  setf cdac
  1197.  
  1198.  setf /cpuclk   ; 5 cycle
  1199.  setf /cdac
  1200.  
  1201.  setf cpuclk    ; 6 cycle
  1202.  setf cdac
  1203.  
  1204.  setf /cpuclk   ; 7 cycle
  1205.  setf as uds lds
  1206.  setf /cdac
  1207.  
  1208. ; result: set id_dis to 1
  1209.  
  1210. ; de read  a3=1
  1211.  setf cpuclk    ; 0 cycle
  1212.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1213.  setf cdac
  1214.  
  1215.  setf /cpuclk   ; 1 cycle
  1216.  setf /cdac
  1217.  
  1218.  setf cpuclk    ; 2 cycle
  1219.  setf /as /uds /lds
  1220.  setf cdac
  1221.  
  1222.  setf /cpuclk   ; 3 cycle
  1223. ; setf d14.io d15.io
  1224.  setf /cdac
  1225.  
  1226.  setf cpuclk    ; 4 cycle
  1227.  setf /uds /lds
  1228.  setf cdac
  1229.  
  1230.  setf /cpuclk   ; 5 cycle
  1231.  setf /cdac
  1232.  
  1233.  setf cpuclk    ; 6 cycle
  1234.  setf cdac
  1235.  
  1236.  setf /cpuclk   ; 7 cycle
  1237.  setf as uds lds
  1238.  setf /cdac
  1239.  
  1240. ; result: jump to idst "110" state
  1241.  
  1242.  
  1243.  
  1244.  
  1245. ; b8 write  d14.io=1  d15.io=1
  1246.  setf cpuclk    ; 0 cycle
  1247.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  1248.  setf cdac
  1249.  
  1250.  setf /cpuclk   ; 1 cycle
  1251.  setf /cdac
  1252.  
  1253.  setf cpuclk    ; 2 cycle
  1254.  setf /as ; /uds /lds
  1255.  setf cdac
  1256.  
  1257.  setf /cpuclk   ; 3 cycle
  1258.  setf d14.io d15.io
  1259.  setf /cdac
  1260.  
  1261.  setf cpuclk    ; 4 cycle
  1262.  setf /uds /lds
  1263.  setf cdac
  1264.  
  1265.  setf /cpuclk   ; 5 cycle
  1266.  setf /cdac
  1267.  
  1268.  setf cpuclk    ; 6 cycle
  1269.  setf cdac
  1270.  
  1271.  setf /cpuclk   ; 7 cycle
  1272.  setf as uds lds
  1273.  setf /cdac
  1274.  
  1275. ; result: set c0_mem_en to 1
  1276.  
  1277.  
  1278.  
  1279.  
  1280.  
  1281. ; de read  a3=1
  1282.  setf cpuclk    ; 0 cycle
  1283.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1284.  setf cdac
  1285.  
  1286.  setf /cpuclk   ; 1 cycle
  1287.  setf /cdac
  1288.  
  1289.  setf cpuclk    ; 2 cycle
  1290.  setf /as /uds /lds
  1291.  setf cdac
  1292.  
  1293.  setf /cpuclk   ; 3 cycle
  1294. ; setf d14.io d15.io
  1295.  setf /cdac
  1296.  
  1297.  setf cpuclk    ; 4 cycle
  1298.  setf /uds /lds
  1299.  setf cdac
  1300.  
  1301.  setf /cpuclk   ; 5 cycle
  1302.  setf /cdac
  1303.  
  1304.  setf cpuclk    ; 6 cycle
  1305.  setf cdac
  1306.  
  1307.  setf /cpuclk   ; 7 cycle
  1308.  setf as uds lds
  1309.  setf /cdac
  1310.  
  1311. ; result: jump to idst "111" state
  1312.  
  1313.  
  1314.  
  1315.  
  1316. ; b8 write  d14.io=1  d15.io=0
  1317.  setf cpuclk    ; 0 cycle
  1318.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  1319.  setf cdac
  1320.  
  1321.  setf /cpuclk   ; 1 cycle
  1322.  setf /cdac
  1323.  
  1324.  setf cpuclk    ; 2 cycle
  1325.  setf /as ; /uds /lds
  1326.  setf cdac
  1327.  
  1328.  setf /cpuclk   ; 3 cycle
  1329.  setf d14.io /d15.io
  1330.  setf /cdac
  1331.  
  1332.  setf cpuclk    ; 4 cycle
  1333.  setf /uds /lds
  1334.  setf cdac
  1335.  
  1336.  setf /cpuclk   ; 5 cycle
  1337.  setf /cdac
  1338.  
  1339.  setf cpuclk    ; 6 cycle
  1340.  setf cdac
  1341.  
  1342.  setf /cpuclk   ; 7 cycle
  1343.  setf as uds lds
  1344.  setf /cdac
  1345.  
  1346. ; result: set f8_mem_en to 0
  1347.  
  1348.  
  1349.  
  1350.  
  1351. ; de read  a3=1
  1352.  setf cpuclk    ; 0 cycle
  1353.  setf rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1354.  setf cdac
  1355.  
  1356.  setf /cpuclk   ; 1 cycle
  1357.  setf /cdac
  1358.  
  1359.  setf cpuclk    ; 2 cycle
  1360.  setf /as /uds /lds
  1361.  setf cdac
  1362.  
  1363.  setf /cpuclk   ; 3 cycle
  1364. ; setf d14.io d15.io
  1365.  setf /cdac
  1366.  
  1367.  setf cpuclk    ; 4 cycle
  1368.  setf /uds /lds
  1369.  setf cdac
  1370.  
  1371.  setf /cpuclk   ; 5 cycle
  1372.  setf /cdac
  1373.  
  1374.  setf cpuclk    ; 6 cycle
  1375.  setf cdac
  1376.  
  1377.  setf /cpuclk   ; 7 cycle
  1378.  setf as uds lds
  1379.  setf /cdac
  1380.  
  1381. ; result: jump to idst "000" state
  1382.  
  1383.  
  1384.  
  1385.  
  1386. ; b8 write  d14.io=1  d15.io=0
  1387.  setf cpuclk    ; 0 cycle
  1388.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  1389.  setf cdac
  1390.  
  1391.  setf /cpuclk   ; 1 cycle
  1392.  setf /cdac
  1393.  
  1394.  setf cpuclk    ; 2 cycle
  1395.  setf /as ; /uds /lds
  1396.  setf cdac
  1397.  
  1398.  setf /cpuclk   ; 3 cycle
  1399.  setf d14.io /d15.io
  1400.  setf /cdac
  1401.  
  1402.  setf cpuclk    ; 4 cycle
  1403.  setf /uds /lds
  1404.  setf cdac
  1405.  
  1406.  setf /cpuclk   ; 5 cycle
  1407.  setf /cdac
  1408.  
  1409.  setf cpuclk    ; 6 cycle
  1410.  setf cdac
  1411.  
  1412.  setf /cpuclk   ; 7 cycle
  1413.  setf as uds lds
  1414.  setf /cdac
  1415.  
  1416. ; result: set f8_wr_en to 0
  1417.  
  1418.  
  1419.  
  1420.  
  1421. ; de write  a3=0
  1422.  setf cpuclk    ; 0 cycle
  1423.  setf /rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 /a3
  1424.  setf cdac
  1425.  
  1426.  setf /cpuclk   ; 1 cycle
  1427.  setf /cdac
  1428.  
  1429.  setf cpuclk    ; 2 cycle
  1430.  setf /as ;/uds /lds
  1431.  setf cdac
  1432.  
  1433.  setf /cpuclk   ; 3 cycle
  1434.  setf d14.io d15.io
  1435.  setf /cdac
  1436.  
  1437.  setf cpuclk    ; 4 cycle
  1438.  setf /uds /lds
  1439.  setf cdac
  1440.  
  1441.  setf /cpuclk   ; 5 cycle
  1442.  setf /cdac
  1443.  
  1444.  setf cpuclk    ; 6 cycle
  1445.  setf cdac
  1446.  
  1447.  setf /cpuclk   ; 7 cycle
  1448.  setf as uds lds
  1449.  setf /cdac
  1450.  
  1451. ; result: jump to idst "001" state
  1452.  
  1453.  
  1454.  
  1455.  
  1456. ; de write  a3=1
  1457.  setf cpuclk    ; 0 cycle
  1458.  setf /rd_wr a23 a22 /a21 a20 a19 a18 a17 /a16 a3
  1459.  setf cdac
  1460.  
  1461.  setf /cpuclk   ; 1 cycle
  1462.  setf /cdac
  1463.  
  1464.  setf cpuclk    ; 2 cycle
  1465.  setf /as ;/uds /lds
  1466.  setf cdac
  1467.  
  1468.  setf /cpuclk   ; 3 cycle
  1469.  setf d14.io d15.io
  1470.  setf /cdac
  1471.  
  1472.  setf cpuclk    ; 4 cycle
  1473.  setf /uds /lds
  1474.  setf cdac
  1475.  
  1476.  setf /cpuclk   ; 5 cycle
  1477.  setf /cdac
  1478.  
  1479.  setf cpuclk    ; 6 cycle
  1480.  setf cdac
  1481.  
  1482.  setf /cpuclk   ; 7 cycle
  1483.  setf as uds lds
  1484.  setf /cdac
  1485.  
  1486. ; result: jump to idst "001" state
  1487.  
  1488.  
  1489.  
  1490.  
  1491. ; b8 write  d14.io=1  d15.io=0
  1492.  setf cpuclk    ; 0 cycle
  1493.  setf /rd_wr a23 /a22 a21 a20 a19 /a18 /a17 /a16
  1494.  setf cdac
  1495.  
  1496.  setf /cpuclk   ; 1 cycle
  1497.  setf /cdac
  1498.  
  1499.  setf cpuclk    ; 2 cycle
  1500.  setf /as
  1501.  setf cdac
  1502.  
  1503.  setf /cpuclk   ; 3 cycle
  1504.  setf d14.io /d15.io
  1505.  setf /cdac
  1506.  
  1507.  setf cpuclk    ; 4 cycle
  1508.  setf /uds /lds
  1509.  setf cdac
  1510.  
  1511.  setf /cpuclk   ; 5 cycle
  1512.  setf /cdac
  1513.  
  1514.  setf cpuclk    ; 6 cycle
  1515.  setf cdac
  1516.  
  1517.  setf /cpuclk   ; 7 cycle
  1518.  setf as uds lds
  1519.  setf /cdac
  1520.  
  1521. ; result: set id_dis to 0
  1522.  
  1523.  
  1524.  
  1525.  
  1526.  
  1527.  
  1528. ;--------------------------------------------------------------------
  1529. ; simulation memory part
  1530.  
  1531.  
  1532. ; write 20xxxx
  1533.  setf cpuclk    ; 0 cycle
  1534.  setf /rd_wr /a23 /a22 a21 /a20 /a19 /a18 /a17 /a16
  1535.  setf cdac
  1536.  
  1537.  setf /cpuclk   ; 1 cycle
  1538.  setf /cdac
  1539.  
  1540.  setf cpuclk    ; 2 cycle
  1541.  setf /as ;/uds /lds
  1542.  setf cdac
  1543.  
  1544.  setf /cpuclk   ; 3 cycle
  1545. ; setf d14.io d15.io
  1546.  
  1547. ; regeneration counter set last bit to 1
  1548.  setf regclk
  1549.  
  1550.  setf /cdac
  1551.  
  1552.  setf cpuclk    ; 4 cycle
  1553.  setf /uds /lds
  1554.  setf cdac
  1555.  
  1556.  setf /cpuclk   ; 5 cycle
  1557.  setf /cdac
  1558.  
  1559.  setf cpuclk    ; 6 cycle
  1560.  setf cdac
  1561.  
  1562.  setf /cpuclk   ; 7 cycle
  1563.  setf as uds lds
  1564.  setf /cdac
  1565.  
  1566.  
  1567. ; read 20xxxx
  1568.  setf cpuclk    ; 0 cycle
  1569.  setf rd_wr /a23 /a22 a21 /a20 /a19 /a18 /a17 /a16
  1570.  setf /regclk  ; from casreg (counter reset)=1 ~50ns after cdac ~~|__
  1571.  setf cdac
  1572.  
  1573.  setf /cpuclk   ; 1 cycle
  1574.  setf /cdac
  1575.  
  1576.  setf cpuclk    ; 2 cycle
  1577.  setf /as /uds /lds
  1578.  setf cdac
  1579.  
  1580.  setf /cpuclk   ; 3 cycle
  1581. ; setf d14.io d15.io
  1582.  setf /cdac
  1583.  
  1584.  setf cpuclk    ; 4 cycle
  1585. ; setf /uds /lds
  1586.  setf cdac
  1587.  
  1588.  setf /cpuclk   ; 5 cycle
  1589.  setf /cdac
  1590.  
  1591.  setf cpuclk    ; 6 cycle
  1592.  setf cdac
  1593.  
  1594.  setf /cpuclk   ; 7 cycle
  1595.  setf as uds lds
  1596.  setf /cdac
  1597.  
  1598.  
  1599. ; write 20xxxx uds=0 lds=1
  1600.  setf cpuclk    ; 0 cycle
  1601.  setf /rd_wr /a23 /a22 a21 /a20 /a19 /a18 /a17 /a16
  1602.  setf cdac
  1603.  
  1604.  setf /cpuclk   ; 1 cycle
  1605.  setf /cdac
  1606.  
  1607.  setf cpuclk    ; 2 cycle
  1608.  setf /as ;/uds /lds
  1609.  setf cdac
  1610.  
  1611.  setf /cpuclk   ; 3 cycle
  1612. ; setf d14.io d15.io
  1613.  setf /cdac
  1614.  
  1615.  setf cpuclk    ; 4 cycle
  1616.  setf /uds ;/lds
  1617.  setf cdac
  1618.  
  1619.  setf /cpuclk   ; 5 cycle
  1620.  setf /cdac
  1621.  
  1622.  setf cpuclk    ; 6 cycle
  1623.  setf cdac
  1624.  
  1625.  setf /cpuclk   ; 7 cycle
  1626.  setf as uds lds
  1627.  setf /cdac
  1628.  
  1629.  
  1630. ; read 20xxxx uds=1 lds=0
  1631.  setf cpuclk    ; 0 cycle
  1632.  setf rd_wr /a23 /a22 a21 /a20 /a19 /a18 /a17 /a16
  1633.  setf cdac
  1634.  
  1635.  setf /cpuclk   ; 1 cycle
  1636.  setf /cdac
  1637.  
  1638.  setf cpuclk    ; 2 cycle
  1639.  setf /as /lds ;/uds
  1640.  setf cdac
  1641.  
  1642.  setf /cpuclk   ; 3 cycle
  1643.  setf d14.io d15.io
  1644.  setf /cdac
  1645.  
  1646.  setf cpuclk    ; 4 cycle
  1647. ; setf /uds /lds
  1648.  setf cdac
  1649.  
  1650.  setf /cpuclk   ; 5 cycle
  1651.  setf /cdac
  1652.  
  1653.  setf cpuclk    ; 6 cycle
  1654.  setf cdac
  1655.  
  1656.  setf /cpuclk   ; 7 cycle
  1657.  setf as uds lds
  1658.  setf /cdac
  1659.  
  1660.  
  1661.  
  1662.  
  1663.  
  1664.  
  1665. ; write 40xxxx
  1666.  setf cpuclk    ; 0 cycle
  1667.  setf /rd_wr /a23 a22 /a21 /a20 /a19 /a18 /a17 /a16
  1668.  setf cdac
  1669.  
  1670.  setf /cpuclk   ; 1 cycle
  1671.  setf /cdac
  1672.  
  1673.  setf cpuclk    ; 2 cycle
  1674.  setf /as ;/uds /lds
  1675.  setf cdac
  1676.  
  1677.  setf /cpuclk   ; 3 cycle
  1678. ; setf d14.io d15.io
  1679.  setf /cdac
  1680.  
  1681.  setf cpuclk    ; 4 cycle
  1682.  setf /uds /lds
  1683.  setf cdac
  1684.  
  1685.  setf /cpuclk   ; 5 cycle
  1686.  setf /cdac
  1687.  
  1688.  setf cpuclk    ; 6 cycle
  1689.  setf cdac
  1690.  
  1691.  setf /cpuclk   ; 7 cycle
  1692.  setf as uds lds
  1693.  setf /cdac
  1694.  
  1695.  
  1696. ; read 40xxxx
  1697.  setf cpuclk    ; 0 cycle
  1698.  setf rd_wr /a23 a22 /a21 /a20 /a19 /a18 /a17 /a16
  1699.  setf cdac
  1700.  
  1701.  setf /cpuclk   ; 1 cycle
  1702.  setf /cdac
  1703.  
  1704.  setf cpuclk    ; 2 cycle
  1705.  setf /as /uds /lds
  1706.  setf cdac
  1707.  
  1708.  setf /cpuclk   ; 3 cycle
  1709. ; setf d14.io d15.io
  1710.  setf /cdac
  1711.  
  1712.  setf cpuclk    ; 4 cycle
  1713. ; setf /uds /lds
  1714.  setf cdac
  1715.  
  1716.  setf /cpuclk   ; 5 cycle
  1717.  setf /cdac
  1718.  
  1719.  setf cpuclk    ; 6 cycle
  1720.  setf cdac
  1721.  
  1722.  setf /cpuclk   ; 7 cycle
  1723.  setf as uds lds
  1724.  setf /cdac
  1725.  
  1726.  
  1727.  
  1728.  
  1729.  
  1730.  
  1731. ; write 60xxxx
  1732.  setf cpuclk    ; 0 cycle
  1733.  setf /rd_wr /a23 a22 a21 /a20 /a19 /a18 /a17 /a16
  1734.  setf cdac
  1735.  
  1736.  setf /cpuclk   ; 1 cycle
  1737.  setf /cdac
  1738.  
  1739.  setf cpuclk    ; 2 cycle
  1740.  setf /as ;/uds /lds
  1741.  setf cdac
  1742.  
  1743.  setf /cpuclk   ; 3 cycle
  1744. ; setf d14.io d15.io
  1745.  setf /cdac
  1746.  
  1747.  setf cpuclk    ; 4 cycle
  1748.  setf /uds /lds
  1749.  setf cdac
  1750.  
  1751.  setf /cpuclk   ; 5 cycle
  1752.  setf /cdac
  1753.  
  1754.  setf cpuclk    ; 6 cycle
  1755.  setf cdac
  1756.  
  1757.  setf /cpuclk   ; 7 cycle
  1758.  setf as uds lds
  1759.  setf /cdac
  1760.  
  1761.  
  1762. ; read 60xxxx
  1763.  setf cpuclk    ; 0 cycle
  1764.  setf rd_wr /a23 a22 a21 /a20 /a19 /a18 /a17 /a16
  1765.  setf cdac
  1766.  
  1767.  setf /cpuclk   ; 1 cycle
  1768.  setf /cdac
  1769.  
  1770.  setf cpuclk    ; 2 cycle
  1771.  setf /as /uds /lds
  1772.  setf cdac
  1773.  
  1774.  setf /cpuclk   ; 3 cycle
  1775. ; setf d14.io d15.io
  1776.  setf /cdac
  1777.  
  1778.  setf cpuclk    ; 4 cycle
  1779. ; setf /uds /lds
  1780.  setf cdac
  1781.  
  1782.  setf /cpuclk   ; 5 cycle
  1783.  setf /cdac
  1784.  
  1785.  setf cpuclk    ; 6 cycle
  1786.  setf cdac
  1787.  
  1788.  setf /cpuclk   ; 7 cycle
  1789.  setf as uds lds
  1790.  setf /cdac
  1791.  
  1792.  
  1793.  
  1794.  
  1795.  
  1796.  
  1797. ; write 80xxxx
  1798.  setf cpuclk    ; 0 cycle
  1799.  setf /rd_wr a23 /a22 /a21 /a20 /a19 /a18 /a17 /a16
  1800.  setf cdac
  1801.  
  1802.  setf /cpuclk   ; 1 cycle
  1803.  setf /cdac
  1804.  
  1805.  setf cpuclk    ; 2 cycle
  1806.  setf /as ;/uds /lds
  1807.  setf cdac
  1808.  
  1809.  setf /cpuclk   ; 3 cycle
  1810. ; setf d14.io d15.io
  1811.  setf /cdac
  1812.  
  1813.  setf cpuclk    ; 4 cycle
  1814.  setf /uds /lds
  1815.  setf cdac
  1816.  
  1817.  setf /cpuclk   ; 5 cycle
  1818.  setf /cdac
  1819.  
  1820.  setf cpuclk    ; 6 cycle
  1821.  setf cdac
  1822.  
  1823.  setf /cpuclk   ; 7 cycle
  1824.  setf as uds lds
  1825.  setf /cdac
  1826.  
  1827.  
  1828. ; read 80xxxx
  1829.  setf cpuclk    ; 0 cycle
  1830.  setf rd_wr a23 /a22 /a21 /a20 /a19 /a18 /a17 /a16
  1831.  setf cdac
  1832.  
  1833.  setf /cpuclk   ; 1 cycle
  1834.  setf /cdac
  1835.  
  1836.  setf cpuclk    ; 2 cycle
  1837.  setf /as /uds /lds
  1838.  setf cdac
  1839.  
  1840.  setf /cpuclk   ; 3 cycle
  1841. ; setf d14.io d15.io
  1842.  setf /cdac
  1843.  
  1844.  setf cpuclk    ; 4 cycle
  1845. ; setf /uds /lds
  1846.  setf cdac
  1847.  
  1848.  setf /cpuclk   ; 5 cycle
  1849.  setf /cdac
  1850.  
  1851.  setf cpuclk    ; 6 cycle
  1852.  setf cdac
  1853.  
  1854.  setf /cpuclk   ; 7 cycle
  1855.  setf as uds lds
  1856.  setf /cdac
  1857.  
  1858.  
  1859.  
  1860.  
  1861.  
  1862.  
  1863. ; write 88xxxx
  1864.  setf cpuclk    ; 0 cycle
  1865.  setf /rd_wr a23 /a22 /a21 /a20 a19 /a18 /a17 /a16
  1866.  setf cdac
  1867.  
  1868.  setf /cpuclk   ; 1 cycle
  1869.  setf /cdac
  1870.  
  1871.  setf cpuclk    ; 2 cycle
  1872.  setf /as ;/uds /lds
  1873.  setf cdac
  1874.  
  1875.  setf /cpuclk   ; 3 cycle
  1876. ; setf d14.io d15.io
  1877.  setf /cdac
  1878.  
  1879.  setf cpuclk    ; 4 cycle
  1880.  setf /uds /lds
  1881.  setf cdac
  1882.  
  1883.  setf /cpuclk   ; 5 cycle
  1884.  setf /cdac
  1885.  
  1886.  setf cpuclk    ; 6 cycle
  1887.  setf cdac
  1888.  
  1889.  setf /cpuclk   ; 7 cycle
  1890.  setf as uds lds
  1891.  setf /cdac
  1892.  
  1893.  
  1894. ; read 88xxxx
  1895.  setf cpuclk    ; 0 cycle
  1896.  setf rd_wr a23 /a22 /a21 /a20 a19 /a18 /a17 /a16
  1897.  setf cdac
  1898.  
  1899.  setf /cpuclk   ; 1 cycle
  1900.  setf /cdac
  1901.  
  1902.  setf cpuclk    ; 2 cycle
  1903.  setf /as /uds /lds
  1904.  setf cdac
  1905.  
  1906.  setf /cpuclk   ; 3 cycle
  1907. ; setf d14.io d15.io
  1908.  setf /cdac
  1909.  
  1910.  setf cpuclk    ; 4 cycle
  1911. ; setf /uds /lds
  1912.  setf cdac
  1913.  
  1914.  setf /cpuclk   ; 5 cycle
  1915.  setf /cdac
  1916.  
  1917.  setf cpuclk    ; 6 cycle
  1918.  setf cdac
  1919.  
  1920.  setf /cpuclk   ; 7 cycle
  1921.  setf as uds lds
  1922.  setf /cdac
  1923.  
  1924.  
  1925.  
  1926.  
  1927.  
  1928.  
  1929. ; write 90xxxx
  1930.  setf cpuclk    ; 0 cycle
  1931.  setf /rd_wr a23 /a22 /a21 a20 /a19 /a18 /a17 /a16
  1932.  setf cdac
  1933.  
  1934.  setf /cpuclk   ; 1 cycle
  1935.  setf /cdac
  1936.  
  1937.  setf cpuclk    ; 2 cycle
  1938.  setf /as ;/uds /lds
  1939.  setf cdac
  1940.  
  1941.  setf /cpuclk   ; 3 cycle
  1942. ; setf d14.io d15.io
  1943.  setf /cdac
  1944.  
  1945.  setf cpuclk    ; 4 cycle
  1946.  setf /uds /lds
  1947.  setf cdac
  1948.  
  1949.  setf /cpuclk   ; 5 cycle
  1950.  setf /cdac
  1951.  
  1952.  setf cpuclk    ; 6 cycle
  1953.  setf cdac
  1954.  
  1955.  setf /cpuclk   ; 7 cycle
  1956.  setf as uds lds
  1957.  setf /cdac
  1958.  
  1959.  
  1960. ; read 90xxxx
  1961.  setf cpuclk    ; 0 cycle
  1962.  setf rd_wr a23 /a22 /a21 a20 /a19 /a18 /a17 /a16
  1963.  setf cdac
  1964.  
  1965.  setf /cpuclk   ; 1 cycle
  1966.  setf /cdac
  1967.  
  1968.  setf cpuclk    ; 2 cycle
  1969.  setf /as /uds /lds
  1970.  setf cdac
  1971.  
  1972.  setf /cpuclk   ; 3 cycle
  1973. ; setf d14.io d15.io
  1974.  setf /cdac
  1975.  
  1976.  setf cpuclk    ; 4 cycle
  1977. ; setf /uds /lds
  1978.  setf cdac
  1979.  
  1980.  setf /cpuclk   ; 5 cycle
  1981.  setf /cdac
  1982.  
  1983.  setf cpuclk    ; 6 cycle
  1984.  setf cdac
  1985.  
  1986.  setf /cpuclk   ; 7 cycle
  1987.  setf as uds lds
  1988.  setf /cdac
  1989.  
  1990.  
  1991.  
  1992.  
  1993.  
  1994.  
  1995. ; write 98xxxx
  1996.  setf cpuclk    ; 0 cycle
  1997.  setf /rd_wr a23 /a22 /a21 a20 a19 /a18 /a17 /a16
  1998.  setf cdac
  1999.  
  2000.  setf /cpuclk   ; 1 cycle
  2001.  setf /cdac
  2002.  
  2003.  setf cpuclk    ; 2 cycle
  2004.  setf /as ;/uds /lds
  2005.  setf cdac
  2006.  
  2007.  setf /cpuclk   ; 3 cycle
  2008. ; setf d14.io d15.io
  2009.  setf /cdac
  2010.  
  2011.  setf cpuclk    ; 4 cycle
  2012.  setf /uds /lds
  2013.  setf cdac
  2014.  
  2015.  setf /cpuclk   ; 5 cycle
  2016.  setf /cdac
  2017.  
  2018.  setf cpuclk    ; 6 cycle
  2019.  setf cdac
  2020.  
  2021.  setf /cpuclk   ; 7 cycle
  2022.  setf as uds lds
  2023.  setf /cdac
  2024.  
  2025.  
  2026. ; read 98xxxx
  2027.  setf cpuclk    ; 0 cycle
  2028.  setf rd_wr a23 /a22 /a21 a20 a19 /a18 /a17 /a16
  2029.  setf cdac
  2030.  
  2031.  setf /cpuclk   ; 1 cycle
  2032.  setf /cdac
  2033.  
  2034.  setf cpuclk    ; 2 cycle
  2035.  setf /as /uds /lds
  2036.  setf cdac
  2037.  
  2038.  setf /cpuclk   ; 3 cycle
  2039. ; setf d14.io d15.io
  2040.  setf /cdac
  2041.  
  2042.  setf cpuclk    ; 4 cycle
  2043. ; setf /uds /lds
  2044.  setf cdac
  2045.  
  2046.  setf /cpuclk   ; 5 cycle
  2047.  setf /cdac
  2048.  
  2049.  setf cpuclk    ; 6 cycle
  2050.  setf cdac
  2051.  
  2052.  setf /cpuclk   ; 7 cycle
  2053.  setf as uds lds
  2054.  setf /cdac
  2055.  
  2056.  
  2057.  
  2058.  
  2059.  
  2060.  
  2061. ; write c0xxxx
  2062.  setf cpuclk    ; 0 cycle
  2063.  setf /rd_wr a23 a22 /a21 /a20 /a19 /a18 /a17 /a16
  2064.  setf cdac
  2065.  
  2066.  setf /cpuclk   ; 1 cycle
  2067.  setf /cdac
  2068.  
  2069.  setf cpuclk    ; 2 cycle
  2070.  setf /as ;/uds /lds
  2071.  setf cdac
  2072.  
  2073.  setf /cpuclk   ; 3 cycle
  2074. ; setf d14.io d15.io
  2075.  setf /cdac
  2076.  
  2077.  setf cpuclk    ; 4 cycle
  2078.  setf /uds /lds
  2079.  setf cdac
  2080.  
  2081.  setf /cpuclk   ; 5 cycle
  2082.  setf /cdac
  2083.  
  2084.  setf cpuclk    ; 6 cycle
  2085.  setf cdac
  2086.  
  2087.  setf /cpuclk   ; 7 cycle
  2088.  setf as uds lds
  2089.  setf /cdac
  2090.  
  2091.  
  2092. ; read c0xxxx
  2093.  setf cpuclk    ; 0 cycle
  2094.  setf rd_wr a23 a22 /a21 /a20 /a19 /a18 /a17 /a16
  2095.  setf cdac
  2096.  
  2097.  setf /cpuclk   ; 1 cycle
  2098.  setf /cdac
  2099.  
  2100.  setf cpuclk    ; 2 cycle
  2101.  setf /as /uds /lds
  2102.  setf cdac
  2103.  
  2104.  setf /cpuclk   ; 3 cycle
  2105. ; setf d14.io d15.io
  2106.  setf /cdac
  2107.  
  2108.  setf cpuclk    ; 4 cycle
  2109. ; setf /uds /lds
  2110.  setf cdac
  2111.  
  2112.  setf /cpuclk   ; 5 cycle
  2113.  setf /cdac
  2114.  
  2115.  setf cpuclk    ; 6 cycle
  2116.  setf cdac
  2117.  
  2118.  setf /cpuclk   ; 7 cycle
  2119.  setf as uds lds
  2120.  setf /cdac
  2121.  
  2122.  
  2123.  
  2124.  
  2125.  
  2126.  
  2127.  
  2128. ; write c8xxxx
  2129.  setf cpuclk    ; 0 cycle
  2130.  setf /rd_wr a23 a22 /a21 /a20 a19 /a18 /a17 /a16
  2131.  setf cdac
  2132.  
  2133.  setf /cpuclk   ; 1 cycle
  2134.  setf /cdac
  2135.  
  2136.  setf cpuclk    ; 2 cycle
  2137.  setf /as ;/uds /lds
  2138.  setf cdac
  2139.  
  2140.  setf /cpuclk   ; 3 cycle
  2141. ; setf d14.io d15.io
  2142.  setf /cdac
  2143.  
  2144.  setf cpuclk    ; 4 cycle
  2145.  setf /uds /lds
  2146.  setf cdac
  2147.  
  2148.  setf /cpuclk   ; 5 cycle
  2149.  setf /cdac
  2150.  
  2151.  setf cpuclk    ; 6 cycle
  2152.  setf cdac
  2153.  
  2154.  setf /cpuclk   ; 7 cycle
  2155.  setf as uds lds
  2156.  setf /cdac
  2157.  
  2158.  
  2159. ; read c8xxxx
  2160.  setf cpuclk    ; 0 cycle
  2161.  setf rd_wr a23 a22 /a21 /a20 a19 /a18 /a17 /a16
  2162.  setf cdac
  2163.  
  2164.  setf /cpuclk   ; 1 cycle
  2165.  setf /cdac
  2166.  
  2167.  setf cpuclk    ; 2 cycle
  2168.  setf /as /uds /lds
  2169.  setf cdac
  2170.  
  2171.  setf /cpuclk   ; 3 cycle
  2172. ; setf d14.io d15.io
  2173.  setf /cdac
  2174.  
  2175.  setf cpuclk    ; 4 cycle
  2176. ; setf /uds /lds
  2177.  setf cdac
  2178.  
  2179.  setf /cpuclk   ; 5 cycle
  2180.  setf /cdac
  2181.  
  2182.  setf cpuclk    ; 6 cycle
  2183.  setf cdac
  2184.  
  2185.  setf /cpuclk   ; 7 cycle
  2186.  setf as uds lds
  2187.  setf /cdac
  2188.  
  2189.  
  2190.  
  2191.  
  2192.  
  2193.  
  2194.  
  2195. ; write d0xxxx
  2196.  setf cpuclk    ; 0 cycle
  2197.  setf /rd_wr a23 a22 /a21 a20 /a19 /a18 /a17 /a16
  2198.  setf cdac
  2199.  
  2200.  setf /cpuclk   ; 1 cycle
  2201.  setf /cdac
  2202.  
  2203.  setf cpuclk    ; 2 cycle
  2204.  setf /as ;/uds /lds
  2205.  setf cdac
  2206.  
  2207.  setf /cpuclk   ; 3 cycle
  2208. ; setf d14.io d15.io
  2209.  setf /cdac
  2210.  
  2211.  setf cpuclk    ; 4 cycle
  2212.  setf /uds /lds
  2213.  setf cdac
  2214.  
  2215.  setf /cpuclk   ; 5 cycle
  2216.  setf /cdac
  2217.  
  2218.  setf cpuclk    ; 6 cycle
  2219.  setf cdac
  2220.  
  2221.  setf /cpuclk   ; 7 cycle
  2222.  setf as uds lds
  2223.  setf /cdac
  2224.  
  2225.  
  2226. ; read d0xxxx
  2227.  setf cpuclk    ; 0 cycle
  2228.  setf rd_wr a23 a22 /a21 a20 /a19 /a18 /a17 /a16
  2229.  setf cdac
  2230.  
  2231.  setf /cpuclk   ; 1 cycle
  2232.  setf /cdac
  2233.  
  2234.  setf cpuclk    ; 2 cycle
  2235.  setf /as /uds /lds
  2236.  setf cdac
  2237.  
  2238.  setf /cpuclk   ; 3 cycle
  2239. ; setf d14.io d15.io
  2240.  setf /cdac
  2241.  
  2242.  setf cpuclk    ; 4 cycle
  2243. ; setf /uds /lds
  2244.  setf cdac
  2245.  
  2246.  setf /cpuclk   ; 5 cycle
  2247.  setf /cdac
  2248.  
  2249.  setf cpuclk    ; 6 cycle
  2250.  setf cdac
  2251.  
  2252.  setf /cpuclk   ; 7 cycle
  2253.  setf as uds lds
  2254.  setf /cdac
  2255.  
  2256.  
  2257.  
  2258.  
  2259.  
  2260.  
  2261. ; read d8xxxx  (not ram) (for check)
  2262.  setf cpuclk    ; 0 cycle
  2263.  setf rd_wr a23 a22 /a21 a20 a19 /a18 /a17 /a16
  2264.  setf cdac
  2265.  
  2266.  setf /cpuclk   ; 1 cycle
  2267.  setf /cdac
  2268.  
  2269.  setf cpuclk    ; 2 cycle
  2270.  setf /as /uds /lds
  2271.  setf cdac
  2272.  
  2273.  setf /cpuclk   ; 3 cycle
  2274. ; setf d14.io d15.io
  2275.  setf /cdac
  2276.  
  2277.  setf cpuclk    ; 4 cycle
  2278. ; setf /uds /lds
  2279.  setf cdac
  2280.  
  2281.  setf /cpuclk   ; 5 cycle
  2282.  setf /cdac
  2283.  
  2284.  setf cpuclk    ; 6 cycle
  2285.  setf cdac
  2286.  
  2287.  setf /cpuclk   ; 7 cycle
  2288.  setf as uds lds
  2289.  setf /cdac
  2290.  
  2291.  
  2292.  
  2293.  
  2294.  
  2295.  
  2296. ; write f8xxxx
  2297.  setf cpuclk    ; 0 cycle
  2298.  setf /rd_wr a23 a22 a21 a20 a19 /a18 /a17 /a16
  2299.  setf cdac
  2300.  
  2301.  setf /cpuclk   ; 1 cycle
  2302.  setf /cdac
  2303.  
  2304.  setf cpuclk    ; 2 cycle
  2305.  setf /as ;/uds /lds
  2306.  setf cdac
  2307.  
  2308.  setf /cpuclk   ; 3 cycle
  2309. ; setf d14.io d15.io
  2310.  setf /cdac
  2311.  
  2312.  setf cpuclk    ; 4 cycle
  2313.  setf /uds /lds
  2314.  setf cdac
  2315.  
  2316.  setf /cpuclk   ; 5 cycle
  2317.  setf /cdac
  2318.  
  2319.  setf cpuclk    ; 6 cycle
  2320.  setf cdac
  2321.  
  2322.  setf /cpuclk   ; 7 cycle
  2323.  setf as uds lds
  2324.  setf /cdac
  2325.  
  2326.  
  2327. ; read f8xxxx
  2328.  setf cpuclk    ; 0 cycle
  2329.  setf rd_wr a23 a22 a21 a20 a19 /a18 /a17 /a16
  2330.  setf cdac
  2331.  
  2332.  setf /cpuclk   ; 1 cycle
  2333.  setf /cdac
  2334.  
  2335.  setf cpuclk    ; 2 cycle
  2336.  setf /as /uds /lds
  2337.  setf cdac
  2338.  
  2339.  setf /cpuclk   ; 3 cycle
  2340. ; setf d14.io d15.io
  2341.  setf /cdac
  2342.  
  2343.  setf cpuclk    ; 4 cycle
  2344. ; setf /uds /lds
  2345.  setf cdac
  2346.  
  2347.  setf /cpuclk   ; 5 cycle
  2348.  setf /cdac
  2349.  
  2350.  setf cpuclk    ; 6 cycle
  2351.  setf cdac
  2352.  
  2353.  setf /cpuclk   ; 7 cycle
  2354.  setf as uds lds
  2355.  setf /cdac
  2356.  
  2357.  
  2358.  
  2359.  
  2360.  
  2361.  
  2362. ;--------------------------------------------------------------------
  2363. ; ide part simulation
  2364.  
  2365.  
  2366. ; write da8xxx  d15.io=1
  2367.  setf cpuclk    ; 0 cycle
  2368.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 /a13 /a12
  2369.  setf cdac
  2370.  
  2371.  setf /cpuclk   ; 1 cycle
  2372.  setf /cdac
  2373.  
  2374.  setf cpuclk    ; 2 cycle
  2375.  setf /as ;/uds /lds
  2376.  setf cdac
  2377.  
  2378.  setf /cpuclk   ; 3 cycle
  2379.  setf d15.io
  2380.  setf /cdac
  2381.  
  2382.  setf cpuclk    ; 4 cycle
  2383.  setf /uds /lds
  2384.  setf cdac
  2385.  
  2386.  setf /cpuclk   ; 5 cycle
  2387.  setf /cdac
  2388.  
  2389.  setf cpuclk    ; 6 cycle
  2390.  setf cdac
  2391.  
  2392.  setf /cpuclk   ; 7 cycle
  2393.  setf d15.io
  2394.  setf as uds lds
  2395.  setf /cdac
  2396.  
  2397. ; write da8xxx  d15.io=0
  2398.  setf cpuclk    ; 0 cycle
  2399.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 /a13 /a12
  2400.  setf cdac
  2401.  
  2402.  setf /cpuclk   ; 1 cycle
  2403.  setf /cdac
  2404.  
  2405.  setf cpuclk    ; 2 cycle
  2406.  setf /as ;/uds /lds
  2407.  setf cdac
  2408.  
  2409.  setf /cpuclk   ; 3 cycle
  2410.  setf /d15.io
  2411.  setf /cdac
  2412.  
  2413.  setf cpuclk    ; 4 cycle
  2414.  setf /uds /lds
  2415.  setf cdac
  2416.  
  2417.  setf /cpuclk   ; 5 cycle
  2418.  setf /cdac
  2419.  
  2420.  setf cpuclk    ; 6 cycle
  2421.  setf cdac
  2422.  
  2423.  setf /cpuclk   ; 7 cycle
  2424.  setf /d15.io
  2425.  setf as uds lds
  2426.  setf /cdac
  2427.  
  2428.  
  2429.  
  2430. ; set ide interrupt request
  2431.  setf irq
  2432.  
  2433.  
  2434.  
  2435.  
  2436. ; write da9xxx  d15.io=1
  2437.  setf cpuclk    ; 0 cycle
  2438.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 /a13 a12
  2439.  setf cdac
  2440.  
  2441.  setf /cpuclk   ; 1 cycle
  2442.  setf /cdac
  2443.  
  2444.  setf cpuclk    ; 2 cycle
  2445.  setf /as ;/uds /lds
  2446.  setf cdac
  2447.  
  2448.  setf /cpuclk   ; 3 cycle
  2449.  setf d15.io
  2450.  setf /cdac
  2451.  
  2452.  setf cpuclk    ; 4 cycle
  2453.  setf /uds /lds
  2454.  setf cdac
  2455.  
  2456.  setf /cpuclk   ; 5 cycle
  2457.  setf /cdac
  2458.  
  2459.  setf cpuclk    ; 6 cycle
  2460.  setf cdac
  2461.  
  2462.  setf /cpuclk   ; 7 cycle
  2463.  setf as uds lds
  2464.  setf /cdac
  2465.  
  2466. ; write da9xxx  d15.io=0
  2467.  setf cpuclk    ; 0 cycle
  2468.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 /a13 a12
  2469.  setf cdac
  2470.  
  2471.  setf /cpuclk   ; 1 cycle
  2472.  setf /cdac
  2473.  
  2474.  setf cpuclk    ; 2 cycle
  2475.  setf /as ;/uds /lds
  2476.  setf cdac
  2477.  
  2478.  setf /cpuclk   ; 3 cycle
  2479.  setf /d15.io
  2480.  setf /cdac
  2481.  
  2482.  setf cpuclk    ; 4 cycle
  2483.  setf /uds /lds
  2484.  setf cdac
  2485.  
  2486.  setf /cpuclk   ; 5 cycle
  2487.  setf /cdac
  2488.  
  2489.  setf cpuclk    ; 6 cycle
  2490.  setf cdac
  2491.  
  2492.  setf /cpuclk   ; 7 cycle
  2493.  setf as uds lds
  2494.  setf /cdac
  2495.  
  2496.  
  2497.  
  2498.  
  2499.  
  2500.  
  2501. ; write daaxxx  d15.io=0  da9000->int2 disabled
  2502.  setf cpuclk    ; 0 cycle
  2503.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 a13 /a12
  2504.  setf cdac
  2505.  
  2506.  setf /cpuclk   ; 1 cycle
  2507.  setf /cdac
  2508.  
  2509.  setf cpuclk    ; 2 cycle
  2510.  setf /as ;/uds /lds
  2511.  setf cdac
  2512.  
  2513.  setf /cpuclk   ; 3 cycle
  2514.  setf /d15.io
  2515.  setf /cdac
  2516.  
  2517.  setf cpuclk    ; 4 cycle
  2518.  setf /uds /lds
  2519.  setf cdac
  2520.  
  2521.  setf /cpuclk   ; 5 cycle
  2522.  setf /cdac
  2523.  
  2524.  setf cpuclk    ; 6 cycle
  2525.  setf cdac
  2526.  
  2527.  setf /cpuclk   ; 7 cycle
  2528.  setf as uds lds
  2529.  setf /cdac
  2530.  
  2531. ; write daaxxx  d15.io=1  da9000->int2 enabled
  2532.  setf cpuclk    ; 0 cycle
  2533.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 a13 /a12
  2534.  setf cdac
  2535.  
  2536.  setf /cpuclk   ; 1 cycle
  2537.  setf /cdac
  2538.  
  2539.  setf cpuclk    ; 2 cycle
  2540.  setf /as ;/uds /lds
  2541.  setf cdac
  2542.  
  2543.  setf /cpuclk   ; 3 cycle
  2544.  setf d15.io
  2545.  setf /cdac
  2546.  
  2547.  setf cpuclk    ; 4 cycle
  2548.  setf /uds /lds
  2549.  setf cdac
  2550.  
  2551.  setf /cpuclk   ; 5 cycle
  2552.  setf /cdac
  2553.  
  2554.  setf cpuclk    ; 6 cycle
  2555.  setf cdac
  2556.  
  2557.  setf /cpuclk   ; 7 cycle
  2558.  setf as uds lds
  2559.  setf /cdac
  2560.  
  2561.  
  2562.  
  2563.  
  2564.  
  2565.  
  2566. ; read da8xxx
  2567.  setf cpuclk    ; 0 cycle
  2568.  setf rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 /a13 /a12
  2569.  setf cdac
  2570.  
  2571.  setf /cpuclk   ; 1 cycle
  2572.  setf /cdac
  2573.  
  2574.  setf cpuclk    ; 2 cycle
  2575.  setf /as /uds /lds
  2576.  setf cdac
  2577.  
  2578.  setf /cpuclk   ; 3 cycle
  2579. ; setf d15.io
  2580.  setf /cdac
  2581.  
  2582.  setf cpuclk    ; 4 cycle
  2583. ; setf /uds /lds
  2584.  setf cdac
  2585.  
  2586.  setf /cpuclk   ; 5 cycle
  2587.  setf /cdac
  2588.  
  2589.  setf cpuclk    ; 6 cycle
  2590.  setf cdac
  2591.  
  2592.  setf /cpuclk   ; 7 cycle
  2593.  setf as uds lds
  2594.  setf /cdac
  2595.  
  2596. ; read da9xxx
  2597.  setf cpuclk    ; 0 cycle
  2598.  setf rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 /a13 a12
  2599.  setf cdac
  2600.  
  2601.  setf /cpuclk   ; 1 cycle
  2602.  setf /cdac
  2603.  
  2604.  setf cpuclk    ; 2 cycle
  2605.  setf /as /uds /lds
  2606.  setf cdac
  2607.  
  2608.  setf /cpuclk   ; 3 cycle
  2609. ; setf d15.io
  2610.  setf /cdac
  2611.  
  2612.  setf cpuclk    ; 4 cycle
  2613. ; setf /uds /lds
  2614.  setf cdac
  2615.  
  2616.  setf /cpuclk   ; 5 cycle
  2617.  setf /cdac
  2618.  
  2619.  setf cpuclk    ; 6 cycle
  2620.  setf cdac
  2621.  
  2622.  setf /cpuclk   ; 7 cycle
  2623.  setf as uds lds
  2624.  setf /cdac
  2625.  
  2626. ; read daaxxx
  2627.  setf cpuclk    ; 0 cycle
  2628.  setf rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 a15 /a14 a13 /a12
  2629.  setf cdac
  2630.  
  2631.  setf /cpuclk   ; 1 cycle
  2632.  setf /cdac
  2633.  
  2634.  setf cpuclk    ; 2 cycle
  2635.  setf /as /uds /lds
  2636.  setf cdac
  2637.  
  2638.  setf /cpuclk   ; 3 cycle
  2639. ; setf d15.io
  2640.  setf /cdac
  2641.  
  2642.  setf cpuclk    ; 4 cycle
  2643. ; setf /uds /lds
  2644.  setf cdac
  2645.  
  2646.  setf /cpuclk   ; 5 cycle
  2647.  setf /cdac
  2648.  
  2649.  setf cpuclk    ; 6 cycle
  2650.  setf cdac
  2651.  
  2652.  setf /cpuclk   ; 7 cycle
  2653.  setf as uds lds
  2654.  setf /cdac
  2655.  
  2656.  
  2657.  
  2658.  
  2659.  
  2660.  
  2661. ; write da2xxx
  2662.  setf cpuclk    ; 0 cycle
  2663.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 /a15 /a14 a13 /a12
  2664.  setf cdac
  2665.  
  2666.  setf /cpuclk   ; 1 cycle
  2667.  setf /cdac
  2668.  
  2669.  setf cpuclk    ; 2 cycle
  2670.  setf /as ;/uds /lds
  2671.  setf cdac
  2672.  
  2673.  setf /cpuclk   ; 3 cycle
  2674. ; setf d15.io
  2675.  setf /cdac
  2676.  
  2677.  setf cpuclk    ; 4 cycle
  2678.  setf /uds /lds
  2679.  setf cdac
  2680.  
  2681.  setf /cpuclk   ; 5 cycle
  2682.  setf /cdac
  2683.  
  2684.  setf cpuclk    ; 6 cycle
  2685.  setf cdac
  2686.  
  2687.  setf /cpuclk   ; 7 cycle
  2688.  setf as uds lds
  2689.  setf /cdac
  2690.  
  2691. ; read da2xxx
  2692.  setf cpuclk    ; 0 cycle
  2693.  setf rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 /a15 /a14 a13 /a12
  2694.  setf cdac
  2695.  
  2696.  setf /cpuclk   ; 1 cycle
  2697.  setf /cdac
  2698.  
  2699.  setf cpuclk    ; 2 cycle
  2700.  setf /as /uds /lds
  2701.  setf cdac
  2702.  
  2703.  setf /cpuclk   ; 3 cycle
  2704. ; setf d15.io
  2705.  setf /cdac
  2706.  
  2707.  setf cpuclk    ; 4 cycle
  2708. ; setf /uds /lds
  2709.  setf cdac
  2710.  
  2711.  setf /cpuclk   ; 5 cycle
  2712.  setf /cdac
  2713.  
  2714.  setf cpuclk    ; 6 cycle
  2715.  setf cdac
  2716.  
  2717.  setf /cpuclk   ; 7 cycle
  2718.  setf as uds lds
  2719.  setf /cdac
  2720.  
  2721.  
  2722.  
  2723.  
  2724.  
  2725.  
  2726. ; write da3xxx
  2727.  setf cpuclk    ; 0 cycle
  2728.  setf /rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 /a15 /a14 a13 a12
  2729.  setf cdac
  2730.  
  2731.  setf /cpuclk   ; 1 cycle
  2732.  setf /cdac
  2733.  
  2734.  setf cpuclk    ; 2 cycle
  2735.  setf /as ;/uds /lds
  2736.  setf cdac
  2737.  
  2738.  setf /cpuclk   ; 3 cycle
  2739. ; setf d15.io
  2740.  setf /cdac
  2741.  
  2742.  setf cpuclk    ; 4 cycle
  2743.  setf /uds /lds
  2744.  setf cdac
  2745.  
  2746.  setf /cpuclk   ; 5 cycle
  2747.  setf /cdac
  2748.  
  2749.  setf cpuclk    ; 6 cycle
  2750.  setf cdac
  2751.  
  2752.  setf /cpuclk   ; 7 cycle
  2753.  setf as uds lds
  2754.  setf /cdac
  2755.  
  2756. ; read da3xxx
  2757.  setf cpuclk    ; 0 cycle
  2758.  setf rd_wr a23 a22 /a21 a20 a19 /a18 a17 /a16 /a15 /a14 a13 a12
  2759.  setf cdac
  2760.  
  2761.  setf /cpuclk   ; 1 cycle
  2762.  setf /cdac
  2763.  
  2764.  setf cpuclk    ; 2 cycle
  2765.  setf /as /uds /lds
  2766.  setf cdac
  2767.  
  2768.  setf /cpuclk   ; 3 cycle
  2769. ; setf d15.io
  2770.  setf /cdac
  2771.  
  2772.  setf cpuclk    ; 4 cycle
  2773. ; setf /uds /lds
  2774.  setf cdac
  2775.  
  2776.  setf /cpuclk   ; 5 cycle
  2777.  setf /cdac
  2778.  
  2779.  setf cpuclk    ; 6 cycle
  2780.  setf cdac
  2781.  
  2782.  setf /cpuclk   ; 7 cycle
  2783.  setf as uds lds
  2784.  setf /cdac
  2785.  
  2786.  
  2787.  
  2788.  
  2789.  
  2790. ; reset ide interrupt request
  2791.  setf /irq
  2792.  setf cpuclk
  2793.  setf cdac
  2794.  setf /cpuclk
  2795.  setf /cdac
  2796.  
  2797.  
  2798.  
  2799.  
  2800.  trace_off
  2801.  
  2802.  
  2803.  
  2804.